CAAPlanetPerihelionAphelion_NeptuneAphelion <-
function(k){
.Call("CAAPlanetPerihelionAphelion_NeptuneAphelion", k)
}
